(rot13-display-table): Use `vector', not `make-rope'.

diff --git a/lisp/rot13.el b/lisp/rot13.el
index 7c068bc1d81936261e2dcf4294129d152ab1496d..d19a29db7dc8bdb7ca2b4d249cba8eb087be4062 100644 (file)
--- a/lisp/rot13.el
+++ b/lisp/rot13.el
@@ -38,8 +38,8 @@
   (let ((table (make-display-table))
        (i 0))
     (while (< i 26)
-      (aset table (+ i ?a) (make-rope (+ (% (+ i 13) 26) ?a)))
-      (aset table (+ i ?A) (make-rope (+ (% (+ i 13) 26) ?A)))
+      (aset table (+ i ?a) (vector (+ (% (+ i 13) 26) ?a)))
+      (aset table (+ i ?A) (vector (+ (% (+ i 13) 26) ?A)))
       (setq i (1+ i)))
     table)
   "Char table for rot 13 display.")